From: Stefan Monnier Date: Fri, 12 Mar 2021 03:31:39 +0000 (-0500) Subject: * lisp/emacs-lisp/cconv.el (cconv--analyze-use): Simplify (doh!) X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~18^2~3554 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=ba6ae500f19b7791a81005b0af54ca8354ebffcc;p=emacs.git * lisp/emacs-lisp/cconv.el (cconv--analyze-use): Simplify (doh!) --- diff --git a/lisp/emacs-lisp/cconv.el b/lisp/emacs-lisp/cconv.el index cfb0168a6e5..afaa13a8695 100644 --- a/lisp/emacs-lisp/cconv.el +++ b/lisp/emacs-lisp/cconv.el @@ -602,7 +602,7 @@ FORM is the parent form that binds this var." (byte-compile-warn "%s `%S' not left unused" varkind var)) ((and (let (or 'let* 'let) (car form)) - `(,`(,var) ;; (or `(,var nil) : Too many false positives: bug#47080 + `((,var) ;; (or `(,var nil) : Too many false positives: bug#47080 t nil ,_ ,_)) ;; FIXME: Convert this warning to use `macroexp--warn-wrap' ;; so as to give better position information.